home *** CD-ROM | disk | FTP | other *** search
/ PC World Komputer 2007 December / PCWKCD1207B.iso / + TYLKO W WERSJI CYFROWEJ + / PCWK_PROG / Source / 120 / ukryte2 / Ukryte2.cpp < prev    next >
C/C++ Source or Header  |  2007-07-03  |  928b  |  34 lines
  1. //---------------------------------------------------------------------------
  2.  
  3. #include <vcl.h>
  4. #pragma hdrstop
  5. //---------------------------------------------------------------------------
  6. USEFORM("fukryte2.cpp", Form1);
  7. //---------------------------------------------------------------------------
  8. WINAPI WinMain(HINSTANCE, HINSTANCE, LPSTR, int)
  9. {
  10.     try
  11.     {
  12.          Application->Initialize();
  13.          Application->CreateForm(__classid(TForm1), &Form1);
  14.          Application->Run();
  15.     }
  16.     catch (Exception &exception)
  17.     {
  18.          Application->ShowException(&exception);
  19.     }
  20.     catch (...)
  21.     {
  22.          try
  23.          {
  24.              throw Exception("");
  25.          }
  26.          catch (Exception &exception)
  27.          {
  28.              Application->ShowException(&exception);
  29.          }
  30.     }
  31.     return 0;
  32. }
  33. //---------------------------------------------------------------------------
  34.